home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 2003 September / PC Answers September 2003.iso / Software / freeware / pixeltoolbox / Setup.exe / Main / PixelToolbox.exe / PixelToolbox.dxr / Scripts_50_mouse script - common GUI.ls < prev    next >
Encoding:
Text File  |  2002-06-08  |  1.6 KB  |  65 lines
  1. property pMySprite, pMyMember, pMyMember2, pMyMember3
  2.  
  3. on beginSprite me
  4.   pMySprite = sprite(me.spriteNum)
  5.   pMyMember = pMySprite.memberNum
  6.   pMyMember2 = pMyMember - 1
  7.   pMyMember3 = pMyMember + 1
  8. end
  9.  
  10. on mouseEnter me
  11.   if (sprite(4).left <> 800) or (sprite(1).pUndoTrigger = 0) then
  12.     pass()
  13.   else
  14.     set the memberNum of sprite pMySprite to pMyMember3
  15.     case the currentSpriteNum of
  16.       "34":
  17.         put "Revert the current project to the last saved version. (Ctrl+R)" into field "status"
  18.       "40":
  19.         put "Take a snapshot of the current image. (Ctrl+K)" into field "status"
  20.       "41":
  21.         put "Apply the snapshot to the current image. (Ctrl+P)" into field "status"
  22.       "260":
  23.         put "Swap current image and selected snapshot. (Ctrl+W)" into field "status"
  24.     end case
  25.   end if
  26. end
  27.  
  28. on mouseLeave me
  29.   if (sprite(4).left <> 800) or (sprite(1).pUndoTrigger = 0) then
  30.     pass()
  31.   else
  32.     set the memberNum of sprite pMySprite to pMyMember
  33.     put EMPTY into field "status"
  34.   end if
  35. end
  36.  
  37. on mouseDown me
  38.   if (sprite(4).left <> 800) or (sprite(1).pUndoTrigger = 0) then
  39.     pass()
  40.   else
  41.     repeat while the mouseDown
  42.       set the memberNum of sprite pMySprite to pMyMember2
  43.       updateStage()
  44.     end repeat
  45.   end if
  46. end
  47.  
  48. on mouseUp me
  49.   if (sprite(4).left <> 800) or (sprite(1).pUndoTrigger = 0) then
  50.     pass()
  51.   else
  52.     set the memberNum of sprite pMySprite to pMyMember3
  53.     case the currentSpriteNum of
  54.       "34":
  55.         revertProject()
  56.       "40":
  57.         takeSnapshot()
  58.       "41":
  59.         putSnapshot()
  60.       "260":
  61.         swapSnapshot()
  62.     end case
  63.   end if
  64. end
  65.